(mail-extr-all-top-level-domains): Add forward defvar.

diff --git a/lisp/mail/mail-extr.el b/lisp/mail/mail-extr.el
index 7f2e6fef6b6e5985830984971f47ac0cf0d039c1..675444d7ba4dc9099281a98f721d61214a9665b4 100644 (file)
--- a/lisp/mail/mail-extr.el
+++ b/lisp/mail/mail-extr.el
@@ -687,6 +687,7 @@ Unless NO-REPLACE is true, at each of the positions in LIST-SYMBOL
 (defvar disable-initial-guessing-flag) ; dynamic assignment
 (defvar cbeg)                          ; dynamic assignment
 (defvar cend)                          ; dynamic assignment
+(defvar mail-extr-all-top-level-domains) ; Defined below.
 
 ;;;###autoload
 (defun mail-extract-address-components (address &optional all)